APPENDIX 

(SOURCE CODE) 



Text Rain Source Code 



written by Camille Utterback 



#include <windows.h> 
#include <stdlib.h> 
#include <string.h> 
^include <vfw.h> 
#include <time.h> 
#include <wingdi.h> 



#define MAXNUMLINES 25 




//the max number of lines that can be entered at one time (this is just a practical limmit for testing 
- no real reason to keep it this low 



//this could be flexible based on the screen resoluti 



//define MAXREAD 8192 

//biggest amt of text to read into our buffer 



//define PINK RGB(200,100,1 55) 
//define GOLD RGB(185, 140,65) 

//define BLUE RGB(25,0,190) 
//define RED RGB(210,0,30) 
#define GREEN RGB(0,2 1 0,0) 



//--DROP struct - one for each letter 

typedef struct 
{ 

char ltr; 
int x; 
int y; 



t 

int rate; 

COLORREF fadecolor; 

} 

DROP; 

//—LINE struct - an array of drops, there will be one for each line 

typedef struct 

{ 

DROP dropline[MAXNUMLETTERS]; //should call this dropArray 
//int dropArrayLength OR LINEINFO Linelnfo 

} 

LINE; 

//-LINEINFO struct - info about each line (should really be part of LINE) 

typedef struct 
{ 

bool move; 

bool fade; 

COLORREF color; 

//int length; • • 




} 

LINEINFO; 



/* - Declare all functions */ 

LRESULT CALLBACK WindowProc(HWND, UINT, WPARAM, LPARAM); //windows 
routine 

void Run(HWND hwnd); //prints everything from the buffer to the screen 

void CleanUp(); //closes stuff before quitting 

int FindDriver(char driverstring[80], int stringlength); 

bool ReadInTextFromFile(LPCTSTR szFileName,LPVOID szBuffer,DWORD 
maxcharstoread,LPDWORD lpcharsread); 

int SetArray(char[], COLORREF, DROP[]); //returns length of array 

LRESULT CALLBACK VideoCallbackProc(HWND, LPVIDEOHDR); //video callback 
function 



void SetToTop(COLORREF,DROP[],int); y 

void IncLocAndRgn(DROP[], int); 
void FadeText(DROP[], int); 
void PrintText(DROP[], int); 

bool CheckPixel(int, int); 
bool CheckLevel(int); 

void AperatureTest(); //for ceiling projection 

void AperatureFix(); 

void DrawBlackRect(HDC whichdc, int left, int top, int right, int bottom); 






/* 



Declare all global variables 



*/ 



//■ 



STRING 



LINE Lines[MAXNUMLINES]; //an array of LINE structs (which are each an array of DROP 
struct s 

LINEINFO LineInfos[MAXNUMLINES]; 

int LineLengths[MAXNUMLINES]; //array that will hold the letter length of each line in the 
poem 

//could incorporate this into lineinfos. 

COLORREF colors[]={GREEN,PINK,GOLD,BLUE,RED} ; 

int NumColors; 

int gNumLines; 



// --GENERAL 



int cxClient, cyClient; // window dimensions 
TEXTMETRIC tm; 

int cxChar, cyChar, cxCaps; //x and y dimensions of text 

char buffer [MAXRE AD]; 

int CursorValue=0; 
int ActiveLineIndex=0; 



P int HoleWidth-4; 

v int HoleHeight=4; 

'.=> 

i J int HoleL=309; //int HoleL=(640)-(Hole Width/2); 

ill 

!2J int HoleT=237; //int HoleT=(480)-(HoleHeight/2); 

1= 



int HoleGrey=0; 



intDarkThresh=180; 



bool firstpaint=l; 



// WINDOW/OBJECTS . 




HWND hwnd; //main window 

HWND ghWndCap; //capture window 



HDC hdc; 



HDC viddc; //memdc for video image 

HBITMAP tempbitmap2; 



n 



m 
m 
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HDC backwardsdc; //memdc for flipping video image 

HBITMAP BackwardsBitmap; 

HDRAWDIB hdd; //to decompress captured info 



// VIDEO 



HGLOBAL hgout; 



DWORD dwsize; 
LPVOID pformatbmiv; 
LPBITMAPINFO pformatbmi; 
unsigned char* pbits; 




/*— - - - */ 

int WINAPI WinMain(HINSTANCE hlnstance, HINSTANCE hPrevInst, PSTR szCmdL 
iCmdShow) 

{ 

static char szAppName[] = "Text Rain"; 
MSG msg; 

WNDCLASSEX wndclass; 
int i; 

/*define a window class*/ 

wndclass.cbSize = sizeof(wndclass); 
wndclass.style = 0; /*0 was the default style*/ 

) 

wndclass.hlnstance = hlnstance; /*handle to this instance*/ 
wndclass. IpszClassName = szAppName; /*window class name*/ 
wndclass. lpfnWndProc = WindowProc; /*window function*/ 



wndclass.hlcon = LoadIcon(NULL, IDI_APPLICATION); /*icon style*/ 



wndclass.hlconSm = LoadIcon(NULL, IDI_APPLICATION); 
wndclass.hCursor = LoadCursor(NULL, 1DC_ARR0W); /*cursor style*/ 
wndclass.lpszMenuName = NULL; /*no menu*/ 

wndclass.cbClsExtra = 0; /*no extra*/ 
wndclass.cbWndExtra = 0; /*info needed*/ 

wndclass.hbrBackground =(HBRUSH) GetStockObject(WHITE_BRUSH); 
RegisterClassEx (&wndclass); 



hwnd = Create Window( 

szAppName, /*name of window class*/ 

NULL, /"title */ 

WS_POPUP, /*window style*/ 

0, /*x coordinate*/ 

0, /*y coordinate*/ 

640, /* width coordinate*/ 

480, /* height coordinate*/ 

NULL, /* or HWND_DESKTOP no parent window*/ 

NULL, /*menu handle (if parent) - child id if window is a child*/ 



hlnstance, /*handle of this instance of the program*/ 
NULL /*no additional arguments*/ 

); 

/♦windows sends WM_CREATE msg to wndProc while processing createwindow */ 
/♦display window*/ 

ShowWindow(hwnd, iCmdShow); /*windows sends WM_SIZE, 
WM_SHOWWINDOW*/ 

UpdateWindow(hwnd); /* sends WM_PAINT message to windProc */ 



//- 



while (TRUE) 
{ 

if (PeekMessage (&msg, NULL, 0,0, PM_REMOVE)) 
{ 

if (msg. message = WM_QUIT) 
break; 



with it*/ 



TranslateMessage(&msg); 

DispatchMessage(&msg); /* sends msg to windows which calls wndProc 



char szTextFile[]="words.txt"; //name of file to read from 

static char sReadBuffer[MAXREAD]; //our buffer to read stuff into 

static char szTempBufferfMAXREAD]; 

DWORD charsreadok; 

int i,j,linenum,t,g; 
int MaxLineLength; 
int Colorlndex; 

switch(iMsg) 
{ 

case WM_CREATE: 

// g e t device context 

hdc=GetDC(hwnd); 

// crea te VIDDC 

viddc=CreateCompatibleDC(hdc); 
tempbitmap2=CreateCompatibleBitmap(hdc, 640, 480); 
SelectObject(viddc,tempbitmap2); //do I even need to do this? 



pixel 



SetBkMode(viddc, TRANSPARENT); 

// CREATE BACKWARDSDC 

backwardsdc=CreateCompatibleDC(hdc); 

BackwardsBitmap=CreateCompatibleBitmap(hdc, 640, 480); 
SelectObject(backwardsdc,BackwardsBitmap); //enlarge dc from 1 monochrome 



// CREATE HDRAWDIBs 

hdd=DrawDibOpen(); 



// g e t Text Metrics 

GetTextMetrics(hdc,&tm) ; 

cxChar=tm.tmAveCharWidth+l; ■ 

cyChar=tm.tmHeight+tm.tmExternalLeading+ 1 ; 

cxCaps= (tm.tmAveChar Width * 3)/2+l; //cxChar=avecharwidth 



// READ IN USER'S asci STRING and SET ARRAY 



if(!((ReadInTextFromFile(szTextFile,sReadBuffer,MAXREAD,&charsreadok)) 
&& (strlen(sReadBuffer)>l))){ 

//— readtext didn't work or string is only one char long 



MessageBox( hwnd, // handle of owner window 

"can't read in text", // address of text 

in message box 

NULL, // address of title of message 

box 

MB_OK // style of message box 

); 

CleanUp(); 

PostQuitMessage(O); //user clicked close, puts WM_QUIT 
message in the message queue 

}else{ 

// — readtext in from file OK, parse through it. 



arrays. 



MaxLineLength=MAXNUMLETTERS; //length of longest line in textrain 

NumColors=(sizeof(colors))/(sizeof(COLORREF));//5 

ColorIndex=0; 

linenum=0; 



O 



!i 



1J1 



happens i 



while(i<charsreadok){ //strlen(buffer)-l ? 

if((j<MaxLineLength)&&(sReadBuffer[i]!='\r , )){ 

// — need to add something to our temp array 

if(sReadBuffer[i]=='\t'){ 

// — tab char - put 5 spaces into temp array 

for(t=0;t<5;t++){ 

if(j<MaxLineLength){ //and eof? 
szTempBufferfj]- '; 
j++; //don't increment i here - it 

} 

} 

}else{ 

// — all other chars 



if(sReadBuffer[i]!='\n*){ 

//--not a newline, add to array 
szTempBuffer[j]=sReadBuffer[i]; 
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j++; 

} 



i++;//tab, newline, or normal char 



} else {//end ifG<MaxLineLength)&&(sReadBuffer[i]!=V) 

//j> maxlinelength or we're at a cr 

//in either case - we're at the end of the line 

if(j>=MaxLineLength){ //move I to next cr 

while((sReadBuffer[i] != V) && (i<(charsreadok))) 



i++;//i= cr whether or not we hit maxline, move to next 



letter 



// — SET ARRAY 



times) 



//send temparray to SetArray (or do this numrepeatl 



//— set up Linelnfos struct for this line . 
if(linenum<2) 

LineInfos[linenum].move=l; 

else 

Linelnfos[linenum].move=0; 

LineInfos[linenum].fade=0; 
LineInfos[linenum].color=colors[ColorIndex];//RGB(200, 1 00, 1 55) 

if(ColorIndex<(NumColors- 1 )) 
ColorIndex++; 

else 

ColorIndex=0; 
// — send info to SetArray 

LineLengths[linenum] = SetArray(szTempBuffer, 
LineInfos[linenum]. color, Lines[linenum].dropline); 



struct for each letter, 
(basically the strlen) 



//this takes a string of text Text[i], fills a DROP 
//and returns the num of DROP structs filled 



for(t=0;t<MaxLineLength;t++) 
szTempBuffer[t]- '; 

j=0; 

linenum++; 

} 

} 

gNumLines=linenum; //this will be the actual NUMBER of lines, not the 

last index num. 

}//end else for reading in file 



//■ 



CREATE CAPTURE WINDOW 



ghWndCap = capCreateCaptureWindow((LPSTR)"Capture Window", 



WS_CHILD|WS_VISIBLE, 0,0,600,440,(HWND) hwnd, (int)O); 



capSetCallback.OnVideoStream(ghWndCap,&VideoCallbackProc); 
return 0; 



case WM_SIZE: 

/*lParam that gets passed with this message contains 
the new width of the client window in the lowWord 
and the new height of the client window in the HiWord*/ 



//■ 



register callback functions 



cxClient=LOWORD(lParam); 
cyClient=HIWORD(lParam); 



//— — connect to the driver 

//if(capDriverConnect(ghWndCap, FindDriver(QuickCamString, 
(int)strlen(QuickCamString)))){ , ; r < 

if(capDriverConnect(ghWndCap, FindDriver(ATIString, 
(int)strlen(ATIString)))){ 

// - get and set streaming vid parameters 

capCaptureGetSetup(ghWndCap,&CapParms, sizeof(CapParms)); 

CapParms.fCaptureAudio=0; //no audio 
CapParms.dwRequestMicroSecPerFrame=22222; 
CapParms.fAbortRightMouse=0; //no action for rt mouseclick 

CapPaims.fAbortLeftMouse=0; //no action for 1ft mouseclick 

capCaptiireSetSetup(ghWndCap,&CapParms, sizeof(CapParms)); 

capPreviewScale(ghWndCap,l); //stretch preview to size of capture window 




return 0; 




else{ 



MessageBox( hwnd, "can't connect to capture driver", NULL, 
MB_OK|MB_SYSTEMMODAL ); 

CleanUp(); 



// put WM_QUIT message in the message queue (your program won't 

get this back) 

PostQuitMessage(O); 



return 0; 



i_a 

!— 

case WM PAINT: 
O — 

|" if (firstpaint==l){ 

p BitBlt(viddc, 0, 0, cxClient, cyClient, hdc, 0, 0, SRCCOPY); //save a copy 

firstpaint=0; 
} 

return 0; 



caseWM LBUTTONDOWN: 



> 



//—-video SOURCE dialog - BRIGHTNESS, CONTRAST etc for qc 



//if cursor is invisible 
if(CursorValue<0) //will be -1 if invis 

CursorValue=ShowCursor(l );//show cursor 



capDriverGetCaps(ghWndCap, &CapDrvCaps, sizeof(CAPDRIVERCAPS)); 

S3 



Q 



if (CapDrvCaps.fHasDlgVideoSource) 

capDlgVideoSource(ghWndCap); 



:1. return 0; 

i'U 

m 
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case WM_RBUTTONDOWN: 

\ 

// — video FORMAT dialog box - IMAGE SIZE and QUALITY for qc 

//if cursor is invisible 
if(CursorValue<0) //will be -1 if invis 



CursorValue=ShowCursor(l);//show cursor 



capDriverGetCaps(ghWndCap, &CapDrvCaps, sizeof(CAPDRIVERCAPS)); 

if (CapDrvCaps.fHasDlgVideoFormat) 

capDlgVideoFormat(ghWndCap); ' ( 



return 0; 



WMKE YDO WN : 

//No Keydow messages are processed while capturing - 

switch(wParam) 

{ 

caseVKJJP: 

BitBlt(hdc, 0, 0, cxClient, cyClient, viddc, 0, 0, SRCCOPY); 
HoleT-=l; 



AperatureTestQ; 



TextOut(hdc, 30, 30, buffer, wsprintf(buffer,"loc(L,T) = %d, %d 
w=%d h=%d", HoleL, HoleT, HoleWidth, HoleHeight)); 



HoleGrey)); 



gNumLines)); 



TextOut(hdc, 30, 70, buffer, wsprintf(buffer,"grey = %d", 



TextOut(hdc, 30, 70, buffer, wsprintf(buffer,"gNumLines = %d", 



break; 



case VK_DOWN: 

BitBlt(hdc, 0, 0, cxClient, cyClient, viddc, 0, 0, SRCCOPY); 

HoleT+=l; 

AperatureTestQ; 



TextOut(hdc, 30, 30, buffer, wsprintf(buffer,"loc(L,T) = %d, %d 
w=%d h=%d", HoleL, HoleT, HoleWidth, HoleHeight)); 

TextOut(hdc, 30, 70, buffer, wsprintf(buffer,"grey = %d", 

HoleGrey)); 



break; 



case VK_LEFT: 

BitBlt(hdc, 0, 0, cxClient, cyClient, viddc, 0, 0, SRCCOPY); 

HoleL-=l; 

AperatureTest(); 



TextOut(hdc, 30, 30, buffer, wsprintf(buffer,"loc(L,T) - %d, %d 
w=%d h=%d", HoleL, HoleT, HoleWidth, HoleHeight)); 

TextOut(hdc, 30, 70, buffer, wsprintf(buffer,"grey = %d", 

HoleGrey)); 



break; 



case VK RIGHT: 

BitBlt(hdc, 0, 0, cxClient, cyClient, viddc, 0, 0, SRCCOPY); 

HoleL+=l; 

AperatureTestQ; 



TextOut(hdc, 30, 30, buffer, wsprintf(buffer,"loc(L,T) = %d, %d 
w=%d h=%d", HoleL, HoleT, HoleWidth, HoleHeight)); 

TextOut(hdc, 30, 70, buffer,, wsprintf(buffer,"grey = %d", 

HoleGrey)); 



break; 



case VK_F1 : 

BitBlt(hdc, 0, 0, cxClient, cyClient, viddc, 0, 0, SRCCOPY); 

HoleHeight+=l; 

AperatureTest(); 



ix8 



TextOut(hdc, 30, 30, buffer, wsprintf(buffer,"loc(L,T) = %d, %d 
w=%d h=%d", HoleL, HoleT, HoleWidth, HoleHeight)); 



HoleGrey)); 



TextOut(hdc, 30, 70, buffer, wsprintf(buffer,"grey = %d", 



break; 



H case VK F2: 

I, H 



BitBlt(hdc, 0, 0, cxClient, cyClient, viddc, 0, 0, SRCCOPY); 

HoleHeight-=l; 

AperatureTest(); 



TextOut(hdc, 30, 30, buffer, wsprintf(buffer,"loc(L,T) = %d, %d 
w=%d h=%d", HoleL, HoleT, HoleWidth, HoleHeight)); 

TextOut(hdc, 30, 70, buffer, wsprintf(buffer,"grey = %d", 

HoleGrey)); 



break; 



case VK_F3: 

BitBlt(hdc, 0, 0, cxClient, cyClient, viddc, 0, 0, SRCCOPY); 

HoleWidth+=l; 

AperatureTestQ; 



TextOut(hdc, 30, 30, buffer, wsprintf(buffer,"loc(L,T) = %d, %d 
Q w=%d h=%d", HoleL, HoleT, Hole Width, HoleHeight)); 

:1 TextOut(hdc, 30, 70, buffer, wsprintf(buffer,"grey = %d", 

yL HoleGrey)); 



L break; 

i y 
ffi 
Q 



case VK_F4: 

BitBlt(hdc, 0, 0, cxClient, cyClient, viddc, 0, 0, SRCCOPY); 

HoleWidth-=l; 

AperatureTestQ; 



TextOut(hdc, 30, 30, buffer, wsprintf(buffer,"loc(L,T) = %d, %d 
w=%d h=%d", HoleL, HoleT, HoleWidth, HoleHeight)); 



• 



TextOut(hdc, 30, 70, buffer, wsprintf(buffer,"grey = %d", 

HoleGrey)); 



break; 



case VK_F5: 
/* 

BitBlt(hdc, 0, 0, cxClient, cyClient, viddc, 0, 0, SRCCOPY); 
HoleGrey-=10; //-=darker 

HoleGrey=(HoleGrey<0)? 0:HoleGrey; //if r>255 make it 255, 

else let it be 

AperatureTestQ; 



TextOut(hdc, 30, 30, buffer, wsprintf(buffer,"loc(L,T) = %d, %d 
w=%d h=%d", HoleL, HoleT, Hole Width, HoleHeight)); 

TextOut(hdc, 30, 70, buffer, wsprintf(buffer,"grey = %d", 

HoleGrey)); 



BitBlt(hdc, 0, 0, cxClient, cyClient, viddc, 0, 0, SRCCOPY); 



DarkThresh-=5; 



DarkThresh)); 



TextOut(hdc, 30, 70, buffer, wsprintf(buffer,"thresh = %d", 



break; 



case VK_F6: 
/* 

BitBlt(hdc, 0, 0, cxClient, cyClient, viddc, 0, 0, SRCCOPY); 
HoleGrey+=10; 

HoleGrey=(HoleGrey>255)? 255:HoleGrey; //if r>255 make it 

255, else let it be 

AperatureTestQ; 



TextOut(hdc, 30, 30, buffer, wsprintf(buffer,"loc(L,T) = %d, %d 
w=%d h=%d", HoleL, HoleT, Hole Width, HoleHeight)); 

TextOut(hdc, 30, 70, buffer, wsprintf(buffer, M grey = %d", 

HoleGrey)); 

*/ 



} 

BitBlt(hdc, 0, 0, cxClient, cyClient, viddc, 0, 0, SRCCOPY); 



DarkThresh+=5; 



TextOut(hdc, 30, 70, buffer, wsprintf(buffer,"thresh = %d", 



DarkThresh)); 



break; 



caseVK SPACE: 



// Get video format info and begin capture 



// — 1st get pointer to VideoFormat BITMAPINFO struct 



pformatbmi 



dwsize=capGetVideoFormatSize(ghWndCap); //retreive size of 



BITMAPINFO for buffer 



global memory 



start 



hgout=GlobalAlloc(GHND,dwsize);//allocate that amount of 



pformatbmiv=GlobalLock(hgout);//locks object, returns handle to 



, pformatbmi=(LPBITMAPINFO)pformatbmiv; //convert this 
pointer from void to bitmapinfo stuct pointer 

//LPBITMAPINFO pformatbmi; 

//LPVOID pformatbmiv; 



capGetVideoFormat(ghWndCap, pformatbmi, dwsize); 

//valid BITMAPINFO struct is now at address pformatbmi 



GlobalUnlock(hgout); 



// CAPTURE!! 

PatBlt(hdc, 0, 0, cxClient, cyClient, PATCOPY); //paint screen 

white to cover text etc 

//make capture window invisible 
ShowWindow(ghWndCap,FALSE); 

capPreviewScale(ghWndCap,0);//turn off scaling to capture 

window (may improve speed) 

CursorValue=ShowCursor(0);//hide cursor 
capCaptureSequenceNoFile(ghWndCap);//capture but don't save 

// a ft er capture ends (with escape key) 

PatBlt(hdc, 0, 0, cxClient, cyClient, PATCOPY); 
capPreviewScale( ghWndCap, 1); 
ShowWindow(ghWndCapJRUE); 
CursorValue=Sho wCursor( 1 ) ; 



o 
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O 



break; 



case VK_RETURN: //only works after stopping capture w escape 



CleanUp(); 

PostQuitMessage(O); //user clicked close, puts WM_QUIT 
message in the message queue 



^ break; 



} //end switch 



return 0; 



case WM_DESTROY: ^terminate the program*/ 

//WM_CLOSE when processed by defwinproc generates a WM_DESTROY msg. 
//this is the last msg WinProc will get 



CleanUpQ; 



PostQuitMessage(O); /*user clicked close, puts WM_QUIT message in the 
message queue*/ 

//this causes GetMessage to return 0 

return 0; 



} // end msg switch 



return DefWindowProc(hwnd, iMsg, wParam, lParam); //let windows handle if I haven't 

} 



//• 



int SetArray(char myLineTextfl, COLORREF myLineColor, DROP mLetterArray[]) 

{ //a character array //acolorref //an array of DROP 

structs to fill 

//this function loops through a line of text and fills each DROP struct in a corresponding 
//array with the proper letter and color. 

//it also assigns a starting x,y loc and rate to each DROP struct 



* 




//spaces are ommited (ie not added to the DROP array) 
//but the x loc of the next char is adjusted appropriately 



//for readin - count line, figure out center and where line should start (left margin) 
//for now - if line is too long, just omit rest. 



int i; 

intj=0; 

int count=0; 

int size = strlen(myLineText); //length of the string (character array) we're passing 
for(i=0; i<size; i++) //loop through all the letters in this line 



{ 



while(myLineText[j] == ' ') // this is to skip spaces 



{ 



j++; 



//everytime there's a space j gets one more ahead of i 



letter 



} 

m Letter Array [i] . ltr=myLineText[j ] ; 

mLetterArray[i].x= j*cxCaps; //starting x loc of the 

mLetterArray[i].y=(rand() % 200)-200; //starting y loc of the letter 

mLetter Array [i].rate=rand() % 3; //random rate for letter 1-3? 

//letter[i].rate=2; 

mLetter Array [i].fadecolor=myLineColor; //assign linecolor passed from 



Linelnfos 



count++; 



return count; 



void SetToTop(COLORREF myColor,DROP mLetter Array [],int myLineLength) 
{ 



( 



int 1; 

for(i=0; i<myLineLength; i++) 
t 

mLetterArray[i].y=(rand() % 200)-200; 
mLetterArray[i].fadecolor=myColor; 

} 



} 



void Run(HWND hwnd) 

> 

{ 

/*— — paint hdc(screen) with the update areas from memdc - 
BitBlt(hdc, 0, 0, cxClient, cyClient, viddc, 0, 0, SRCCOPY); 

} 

bool CheckPixel(int X, int Y) 

{ 



bool yesorno=l; 



COLORRJEF colorref; 



colorref=GetPixel(viddc,X,Y); 

//0 is closer to dark, 255,255,255 = white 

if(GetRValue(colorref)<DarkThresh && GetGValue(colorref)<DarkThresh && 
GetBValue(colorref)<DarkThresh) 

{ 

yesorno^O; 

} 

return yesorno; 



void IncLocAndRgn(DROP myletter[], int mylinelength) 
{ 

int i; 

int deltadown; 
int testdown; 




for(i=0; i<mylinelength; i++) 
{ 

if (myletter[i].y < (480-cyChar)) //letter is still on screen 
{ 

//— - INCREMENT y values 

//there is the amount I want to move by, and the amount I want to 

test 

//which is a little lower than the move amount 
deltadown=myletter[i].rate + (rand() % 3); //amount we want to 

//testdown = myletter[i].y + deltadown; //where this would end up 
testdown = myletter[i].y + deltadown+ cyChar-1; //where this 

//test color of pixel you're about to move to 

if(CheckPixel(myletter[i].x,testdown)) //l=white 

//myletter[i].y = testdown; //if ok, set y to this loc 
myletter[i].y += deltadown; 

else 
{ 



.ft 



1=* 

is. 



o 



fall 



would end up + offset 




while (CheckPixel(myletter[i].x,testdown)— 0)//as long as 

checkpix returns 0 

testdown-=3;//subtract from testdown until 

checkpixel with this value =1 

//deltadown-=3; 
myletter[i].y = testdown-cyChar+1 ; 
//myletter[i].y +=deltadown; 



j=s else 
□ 



Q 

lu 



// -OFF BOTTOM -- reset to top 

myletter[i].y = 10; 



}//end for --gone through whole set of letters 



} 



//■ 



Video Callback function 



LRESULT CALLBACK VideoCallbackProc(HWND ghWndCap, LPVIDEOHDR lpVHdr) 
{ 

int i; 

int LineToStop; 

int SecondLineToDrop; 

if(!hwnd) 

return FALSE; 



// decompress, mirror and stretch incoming captured frame to viddc 

DrawDibDraw(hdd, 

backwardsdc, 

0,0, //MM_TEXT client coordinates, of 

the upper left corner of the destination rectangle 

(*pformatbmi).bmiHeader.biWidth,(*pformatbmi).bmiHeader.biH 
eight, //height and width 

(LPBITMAPINFOHEADER)pformatbmi, 
lpVHdr->lpData, 



0,0, //in pixels, of the upper left corner of 

the source rectangle. The coordinates (0,0) represent the upper left corner of the bitmap. 



(*pformatbmi).bmiHeader.bi Width, 
(*pformatbmi).bmiHeader.biHeight, 

DDF_SAME_HDC);//DDF_SAME_HDC 



// — StretchBlt stretches and creates a mirror image of a bitmap— 

//If nWidthSrc and nWidthDest have different signs, the function creates a mirror 
image along the x-axis. 

//If nHeightSrc and nHeightDest have different signs, the function creates a mirror 
along the y-axis. 



StretchBlt( viddc, 



rectangle —nWidthSrc 



rectangle 



// handle of destination device context 
640, // x-coordinate of upper-left corner of dest. rect. 
0, // y-coordinate of upper-left corner of dest. rect. 
-640, // width of destination rectangle —nWidthDest 

480, // height of destination rectangle 
backwardsdc, // handle of source device context 

0, // x-coordinate of upper-left corner of source rectangle 
0, // y-coordinate of upper-left corner of source rectangle 
(*pformatbmi).bmiHeader.biWidth, // width of source 



(*pformatbmi).bmiHeader.biHeight, 



// height of source 



SRCCOPY); 



// -check if line is below a certain level 



if(CheckLevel((ActiveLineIndex<gNumLines-l)? ActiveLinelndex+l :0)) //send this 
activelineindex+l,or wrap 



{ 



// start active line FADING 

LineInfos[ActiveLineIndex].fade=l ; 



// STOP active line - 1 from FADING and FALLING (may have to reach back 

to top) 

LineToStop=(ActiveLineIndex>0) ? ActiveLinelndex-l: gNumLines-1; 



LineInfos[LineToStop].move=0; //stop moving 
LineInfos[LineToStop].fade=0; //stop fading 

SetToTop(LineInfos[LineToStop]. color, Lines[LineToStop].dropline, 
LineLengths[LineToStop]);//reset x and y's for that line to top 

//reset line 



//• 



INCREMENT active line number, and start new line FALLING 



SecondLineToDrop=(ActiveLineIndex<gNumLines-2)? 
ActiveLineIndex+2:((ActiveLineIndex<gNumLines-l)? 0:1); 

111 

LineInfos[SecondLineToDrop].move=l ; //turn on new line 
ActiveLineIndex=(ActiveLineIndex<gNumLines-l)? ActiveLinelndex+l :0; 

} 

//move, fade and print lines that are both moving and fading 

for (i=0; KgNumLines; i++) 

{ 

if(LineInfos[i].move && bineInfos[i].fade) 
{ 

IncLocAndRgn(Lines[i].dropline, LineLengths[i]); 
//move letters, based on viddc image 

FadeText(Lines[i].dropline, LineLengths[i]); 
//fade text colors 



PrintText(Lines[i].dropline, LineLengthsfi]); 



} 

} 



//move, and print lines that are moving (do this here so these lines are in front of fading 

ones) 

for (i=0; i<gNumLines; i++) 
{ 

if(LineInfos[i].move && (!LineInfos[i].fade))//assumes you won't fade w-out 

moving. 

{ 

IncLocAndRgn(Lines[i].dropline, LineLengthsfi]); 
//move letters based on viddc image 
PrintText(Lines[i].dropline, LineLengthsfi]); 

} 

} 

AperatureFix(); //send shadow image to sheild camera 
Run(hwnd);//bitblt to scrn 



} 



return (LRESULT) TRUE; 



void FadeText(DROP myLetter[], int myLineLength)//called once for each line that needs to be 
faded 

{ 

int i; 

COLORREF pixelcolor; 
int scrnR, scrnG, scrnB; 
int r, g, b; 

UINT fadedir; 
int fadeamount=5; 



IH want things to desaturate as well 
for (i=0; i<myLineLength; i++) 

{ 

pixelcolor=GetPixel(viddc, myLetter[i].x + (cxChar/2), myLetter[i].y+ 

(cyChar+1/2)); 



if(myLetter[i].y > 0 && (myLetter[i].fadecolor!=pixelcolor)) 
{ 



scrnR=(BYTE)pixelcolor; 

scrnG=(BYTE) (((WORD)pixelcolor) » 8); 

scrnB=(BYTE) (pixelcolor» 16); 

r=(BYTE) myLetter[i].fadecolor; 

g=(BYTE) (((WORD)myLetter[i].fadecolor) » 8); 

b=(BYTE) (myLetter[i].fadecolor » 16); 

if(r!=scrnR) 

{ //add or subtract fadeamount 
fadedir=(r>scrnR)?-l:l; 
r+=fadedir* fadeamount; 

r=(r>255)? 255 :r; //if r>255 make it 255, else let it be 
r=(r<0)?0:r; 

} 

if(g!=scrnG) 

{ //add or subtract fadeamount 
fadedir=(g>scrnG)?-l:l; 
g+=fadedir* fadeamount; 

g=(g>255)? 255:g; //if r>255 make it 255, else let it be 
g=(g<0)?0:g; 



j=4 } 



111 

m 



}//end for 



if(b!=scrnB) 

{ //add or subtract fadeamount 
fadedir=(b>scrnB)?-l:l; 
b+=fadedir* fadeamount; 

b=(b>255)? 255:b; //if r>255 make it 255, else let it be 
b=(b<0)?0:b; 



myLetter[i].fadecolor=RGB(r,g,b); 



void PrintText(DROP myLetter[], int myLineLength) 
//called once for each line that needs to be printed 
{ 

int i; 



for (i=0; i<myLineLength; i++) 
{ 

SetTextColor(viddc, myLetter[i].fadecolor);//could do a check here - only set if 

necessary 

TextOut(viddc, myLetter[i].x, myLetter[i].y, buffer, wsprintf(buffer,"%c", 
myLetter[i].ltr)); 

} 

} 

bool CheckLevel(int myLine) 
{ 

int i=0; 

int numBelowLevel=0; 

while(i<LineLengths[myLine]) 
{ 

//loop through letter array for this line, increment belowLevel for all letters below 

1 00 y coord 

if(Lines[myLine].dropline[i].y > 100) 
numBelowLevel++; 

i++; 

} 

if(numBelowLevel> (LineLengths[myLine]/2)) 



return 1; 



else 

return 0; 

} 



//-— ----- 

int FindDriver(char driverstring[80], int stringlength) 
{ 

char szDeviceName[80]; //string for camera names 

char szDeviceVersion[80]; //string for camera versions 

int wlndex; //camera driver index numbers 

int j ; //for looping through driver string 

bool match=l ; 



//• 



test which video drivers are available 



for (wlndex=0; wlndex < 1 0; wlndex++) 119 is the max index # 

{ 

if(capGetDriverDescription 
(wlndex, szDeviceName,sizeof(szDeviceName), 

' szDeviceVersion, 

sizeof(szDevice Version))) 



toggle 



//loop through name to see if it's the QuickCam 
forG=0; j<(stringlength-l ); j++) 

if(szDeviceName[j]!=driverstring[j]) 

match=0;//if any letter doesn't match, flip th 

//break; //could use break? 



if(match) 

return wlndex; //didn't break - they must be equal 



mateh=l; 



//no matches 
return 1 1 ; 



Up() 

// disconnect driver 

capDriverDisconnect(ghWndCap); 

// clean up GDI stuff 

DeleteDC(viddc); 
DeleteDC(hdc); 

DeleteObject(tempbitmap2); 

DeleteDC(backwardsdc); 
DeleteObject(BackwardsBitmap); 



// close DrawDibLib 

DrawDibClose(hdd); ' - 



//- -be sure cursor value is set back to 0 

i f(CursorValue ! =0) 

{. 

while(CursorValue<0) 

CursorValue=ShowCursor(l); 
while(CursorValue>0) 

CursorValue=ShowCursor(0); 



void AperatureTest(){ 



HBRUSH oldbrush; 



HPEN oldpen; 



oldpen=SelectObject(hdc,CreatePen(PS_SOLID J l,RGB(HoleGrey,HoleGrey,HoleGrey))); 
//selects new brush into hdc 

oldbrush=SelectObject(hdc,CreateSolidBrush(RGB(HoleGrey,HoleGrey,HoleGrey))); 
//CONST LOGBRUSH *lplb 



corner 



corner 



//RGB(HoleGrey,HoleGrey,HoleGrey) 

Ellipse( hdc, // handle to device context 

HoleL, // x-coord. of bounding rectangle's upper-left corner 
HoleT, // y-coord. of bounding rectangle's upper-left corner 
HoleL+Hole Width, // x-coord. of bounding rectangle's lower-right 

HoleT+HoleHeight // y-coord. bounding rectangle's f lower-right 

); 



DeleteObject(SelectObject(hdc,oldpen)); //selects oldbrush and deletes one we created. 
DeleteObject(SelectObject(hdc,oldbrush)); 



//The ellipse is outlined by using the current pen and is filled by using the current brush. 



void AperatureFix(){ 



HBRUSH oldbrush; 
HP EN oldpen; 



oldpen=SelectObject(viddc,CreatePen(PS_SOLID,l,RGB(HoleGrey,HoleGrey,HoleGrey))); 
//selects new brush into hdc 

oldbrush=SelectObject(viddc,CreateSolidBrush(RGB(HoleGrey,HoleGrey,HoleGrey))); 
//CONST LOGBRUSH *lplb 



//RGB(HoleGrey,HoleGrey,HoleGrey) 



Ellipse( 



viddc, // handle to device context 



HoleL, // x-coord. of bounding rectangle's upper-left corner 



HoleT, // y-coord. of bounding rectangle's upper-left corner 



HoleL+HoleWidth, // x-coord. of bounding rectangle's lower-right 



corner 



HoleT+HoleHeight // y-coord. bounding rectangle's f lower-right 

corner 

); 



DeleteObject(SelectObject(viddc,oldpen)); //selects oldbrush and deletes one we created. 
DeleteObject(SelectObject(viddc,oldbrush)); 



} 



void DrawBlackRect(HDC whichdc, int left, int top, int right, int bottom) { 



HBRUSH oldbrush; 
HPEN oldpen; 



oldpen=SelectObject(viddc,CreatePen(PS_SOLID,l,RGB(0,0,0))); //selects new brush 
into hdc 

oldbrush=SelectObject(viddc,CreateSolidBrush(RGB(0,0,0))); //CONST LOGBRUSH 

*lplb 



//RGB(HoleGrey,HoleGrey,HoleGrey) 



Rectangle( whichdc, // handle of device context 

left, // x-coord. of bounding rectangle's upper-left corner 
top, // y-coord. of bounding rectangle's upper-left corner 
right, // x-coord. of bounding rectangle's lower-right corner 
bottom // y-coord. of bounding rectangle's lower-right corner 

); 



DeleteObject(SelectObject(viddc,oldpen)); //selects oldbrush and deletes one we created. 
DeleteObject(SelectObject(viddc,oldbrush)); 

} 

bool ReadInTextFromFile(LPCTSTR szFileName,LPVOID szBuffer,DWORD 
maxcharstoread,LPDWORD lpcharsread) { 



HANDLE myHandle; //returned by CreateFile 



bool bReadFileOK; //to test createfile (though also using formatMessage to do this) 



bool myResult=0; 



//returned by ReadFile 




GENERICREAD, 

FILE_SHARE_READ, 

NULL, 

OPEN_EXISTING, 

FILE_ATTRIBUTE_NORMAL, 

NULL); 



if(myHandle=INV ALID_HANDLE_V ALUE) { 



// — CreateFile returned an INVALID FILE HANDLE 



//TextOut(hdc, 400, 10, buffer, wsprintf(buffer, "error in createfile")); 



//--set our tracking var 
bReadFileOK=FALSE; 

r. < 



be closed 



CloseHandle(myHandle); //readfile was successful so this needs to 



}else{ 

//-ReadFile DID NOT PROCESS OK 
bReadFileOK=FALSE; 



}//end else for createfile 



return bReadFileOK: 



else{ 



//— -CreateFile returned an VALID FILE HANDLE 



//—read the file 



myResult = ReadFile(myHandle, // handle of file to read 



szBuffer, // address of buffer that 



receives data LPVOID 



to read nNumberOffiytesToRead MAXREAD 



maxcharstoread, // number of bytes 



bytes read 



lpcharsread, // address of number of 



overlapped data 



NULL); // address of structure for 



if (myResult! =0){ 



//-ReadFile PROCESSED OK 



bReadFileOK=TRUE; 



//TextOut(hdc, 10, 50, buffer, wsprintf(buffer, 
"NumberOfBytesRead = %d", NumberOfBytesRead )); 



strlen(szBuffer))); 



//TextOut(hdc, 10, 130, buffer, wsprintf(buffer, "textlength= %d", 



